home *** CD-ROM | disk | FTP | other *** search
/ Red Eye Press Kit / Red Eye Press Kit.iso / pc / main.dxr / SCRIPTS_27_puppetSound (mouseUp).ls < prev    next >
Encoding:
Text File  |  2005-07-18  |  599 b   |  20 lines
  1. property soundEffect, channelNumber
  2.  
  3. on getPropertyDescriptionList
  4.   description = [:]
  5.   soundList = []
  6.   repeat with i = 1 to the number of castMembers
  7.     if member(i, 0).type = #sound then
  8.       soundList.add(member(i, 0).name)
  9.     end if
  10.   end repeat
  11.   addProp(description, #soundEffect, [#default: EMPTY, #format: #string, #comment: "play sound:", #range: soundList])
  12.   addProp(description, #channelNumber, [#default: 3, #format: #integer, #comment: "sound channel:", #range: [1, 2, 3]])
  13.   return description
  14. end
  15.  
  16. on mouseUp me
  17.   channelNumber = 2
  18.   puppetSound(soundEffect, channelNumber)
  19. end
  20.